home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / SourceCode / Tutorial / Cookbook / 25.Adder / AdderView.m < prev    next >
Text File  |  1995-06-12  |  978b  |  54 lines

  1.  
  2. /* Generated by Interface Builder */
  3.  
  4. #import "AdderView.h"
  5. #import <appkit/Control.h>
  6. #import <appkit/Form.h>
  7. #import <dpsclient/wraps.h>
  8.  
  9. @implementation AdderView
  10.  
  11. - setSendOutput:anObject
  12. {
  13.     sendOutput = anObject;
  14.     return self;
  15. }
  16.  
  17. - input1:sender
  18. {
  19.     in1 = [sender floatValue];
  20.     sum = in1 + in2;
  21.     [sendOutput setFloatValue:sum];
  22.     [self display];
  23.     return self;
  24. }
  25.  
  26. - input2:sender
  27. {
  28.     in2 = [sender floatValue];
  29.     sum = in1 + in2;
  30.     [sendOutput setFloatValue:sum];
  31.     [self display];
  32.     return self;
  33. }
  34.  
  35. - drawSelf:(NXRect*)r :(int)c
  36. {
  37.     NXEraseRect(&bounds);
  38.     PSsetgray(NX_BLACK);
  39.     PSnewpath();
  40.       PSsetlinewidth(in1*5.0);
  41.       PSmoveto(0.0, bounds.size.height/2.0);
  42.       PSlineto(bounds.size.width, bounds.size.height/2.0);
  43.     PSstroke();
  44.     PSnewpath();
  45.       PSsetlinewidth(in2*5.0);
  46.       PSmoveto(bounds.size.width/2.0, 0.0);
  47.       PSlineto(bounds.size.width/2.0, bounds.size.height);
  48.     PSstroke();
  49.     return self;
  50. }
  51.  
  52.  
  53. @end
  54.